Option Explicit
Sub C_Sample065()
    Application.Calculation = xlCalculationAutomatic	'۰
    Application.Calculation = xlCalculationManual 	'
    Application.Calculation = xlCalculationSemiautomatic		'H~۰
End Sub
